Define CharList
 ( 'A', 'B', 'C', 'D', 'E', 'F', 'G', 'H', 'I', 'J', 'K', 'L', 'M', 'N', 'O', 'P',
   'Q', 'R', 'S', 'T', 'U', 'V', 'W', 'X', 'Y', 'Z', 'a', 'b', 'c', 'd', 'e', 'f',
   'g', 'h', 'i', 'j', 'k', 'l', 'm', 'n', 'o', 'p', 'q', 'r', 's', 't', 'u', 'v',
   'w', 'x', 'y', 'z', '0', '1', '2', '3', '4', '5', '6', '7', '8', '9', '~', '`',
   '!', '@', '#', '$', '%', '^', '&', '*', '(', ')', '-', '_', '=', '+', '[', '{',
   ']', '}', ';', ':', "'", '"', ',', '<', '.', '>', '/', '?', '', '', '', '',
   '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '',
   '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '',
   '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '',
   '', '', '', '', '', '', '', '', '', '', '', '', '', '');

Define WidthList
 (  14,  11,  12,  11,  11,  10,  12,  14,   7,   7,  13,  10,  18,  14,  14,  11,
    14,  12,   9,  12,  14,  14,  20,  16,  14,  12,  10,   8,   9,   8,   8,   8,
    10,  10,   6,   6,   9,   8,  13,  10,  10,   8,  12,   9,   7,   9,  10,  10,
    15,  12,  12,   9,  10,   6,  10,   9,  11,  10,  10,  11,  10,  10,  10,   3,
     4,  14,   9,   8,  10,   6,   8,   7,   4,   5,   7,   7,   9,   8,   5,   6,
     5,   6,   5,   5,   3,  11,   5,   7,   5,   7,   7,   8,   15,  13,  13,  12,
    17,  12,  12,  20,  10,  15,  15,  14,  15,  19,  15,  15,  15,  12,  13,  14,
    17,  22,  17,  16,  15,  20,  22,  12,  20,  11,  11,  23,  14,   12,  10,  10,
     9,  14,   9,   9,  15,   9,  12,  12,  11,  12,  15,  12,  12,  12,  10,  11,
    11,  13,  19,  15,  13,  12,  17,  18,  11,  17,  10,  10,  18,  11);

Define RectList
 ( (   0,  0, 19, 24), (  20,  0, 17, 24), (  38,  0, 17, 24), (  56,  0, 16, 24),
   (  73,  0, 16, 24), (  90,  0, 15, 24), ( 106,  0, 18, 24), ( 125,  0, 19, 24),
   ( 145,  0, 13, 24), ( 159,  0, 13, 24), ( 173,  0, 18, 24), ( 192,  0, 16, 24),
   ( 209,  0, 23, 24), ( 233,  0, 19, 24), ( 253,  0, 19, 24), ( 273,  0, 16, 24),
   ( 290,  0, 19, 24), ( 310,  0, 18, 24), ( 329,  0, 15, 24), ( 345,  0, 18, 24),
   ( 364,  0, 19, 24), ( 384,  0, 19, 24), ( 404,  0, 25, 24), ( 430,  0, 21, 24),
   ( 452,  0, 21, 24), ( 474,  0, 17, 24), ( 492,  0, 16, 24), ( 509,  0, 14, 24),
   ( 524,  0, 15, 24), ( 540,  0, 14, 24), ( 555,  0, 13, 24), ( 569,  0, 13, 24),
   ( 583,  0, 15, 24), ( 599,  0, 16, 24), ( 616,  0, 11, 24), ( 628,  0, 11, 24),
   ( 640,  0, 15, 24), ( 656,  0, 13, 24), ( 670,  0, 19, 24), ( 690,  0, 16, 24),
   ( 707,  0, 16, 24), ( 724,  0, 14, 24), ( 739,  0, 18, 24), ( 758,  0, 15, 24),
   ( 774,  0, 13, 24), ( 788,  0, 15, 24), ( 804,  0, 16, 24), ( 821,  0, 16, 24),
   ( 838,  0, 20, 24), ( 859,  0, 17, 24), ( 877,  0, 17, 24), ( 895,  0, 14, 24),
   ( 910,  0, 15, 24), ( 926,  0, 12, 24), ( 939,  0, 16, 24), ( 956,  0, 15, 24),
   ( 972,  0, 17, 24), ( 990,  0, 15, 24), (1006,  0, 16, 24), (1023,  0, 15, 24),
   (1039,  0, 15, 24), (1055,  0, 15, 24), (1071,  0, 15, 24), (1087,  0, 10, 24),
   (1098,  0,  9, 24), (1108,  0, 19, 24), (1128,  0, 15, 24), (1144,  0, 13, 24),
   (1158,  0, 16, 24), (1175,  0, 11, 24), (1187,  0, 14, 24), (1202,  0, 13, 24),
   (1216,  0, 10, 24), (1227,  0, 10, 24), (1238,  0, 13, 24), (1252,  0, 13, 24),
   (1266,  0, 15, 24), (1282,  0, 14, 24), (1297,  0, 10, 24), (1308,  0, 12, 24),
   (1321,  0, 11, 24), (1333,  0, 12, 24), (1346,  0, 10, 24), (1357,  0, 10, 24),
   (1368,  0, 10, 24), (1379,  0, 15, 24), (1395,  0, 10, 24), (1406,  0, 13, 24),
   (1420,  0, 10, 24), (1431,  0, 13, 24), (1445,  0, 13, 24), (1459,  0, 13, 24),
    (1472,  0, 19, 24), (1492,  0, 17, 24), (1510,  0, 17, 24), (1528,  0, 16, 24),
   (1545,  0, 21, 24), (1567,  0, 14, 24), (1584,  0, 14, 24), (1601,  0, 24, 24),
    (1626,  0, 14, 24), (1641,  0, 19, 24), (1661,  0, 19, 24), (1681,  0, 18, 24),
   (1700,  0, 19, 24), (1720,  0, 23, 24), (1744,  0, 19, 24), (1764,  0, 19, 24),
   (1784,  0, 19, 24), (1804,  0, 17, 24), (1821,  0, 17, 24), (1839,  0, 18, 24),
   (1858,  0, 21, 24), (1880,  0, 26, 24), (1907,  0, 21, 24), (1929,  0, 20, 24),
   (1950,  0, 19, 24), (1970,  0, 24, 24), (1995,  0, 26, 24), (2024,  0, 26, 24),
   (2041,  0, 24, 24), (2067,  0, 15, 24), (2083,  0, 15, 24), (2099,  0, 25, 24),
   (2127,  0, 16, 24),  (2146,  0, 16, 24), (2163,  0, 14, 24), (2178,  0, 14, 24),
   (2193,  0, 13, 24), (2207,  0, 18, 24), (2226,  0, 13, 24), (2240,  0, 13, 24),
   (2254,  0, 19, 24), (2274,  0, 13, 24), (2288,  0, 16, 24), (2305,  0, 16, 24),
   (2322,  0, 15, 24), (2338,  0, 16, 24), (2355,  0, 19, 24), (2375,  0, 16, 24),
   (2392,  0, 16, 24), (2409,  0, 16, 24), (2426,  0, 14, 24), (2441,  0, 15, 24),
   (2457,  0, 15, 24), (2473,  0, 17, 24), (2491,  0, 23, 24), (2515,  0, 17, 24),
   (2533,  0, 17, 24), (2550,  0, 16, 24), (2567,  0, 21, 24), (2589,  0, 22, 24),
   (2611,  0, 15, 24), (2627,  0, 21, 24), (2649,  0, 14, 24), (2663,  0, 15, 24),
   (2679,  0, 22, 24), (2701,  0, 15, 24));

Define OffsetList
 ( (-3, 0), (-3, 0), (-3, 0), (-3, 0), (-3, 0), (-3, 0), (-3, 0), (-3, 0),
   (-3, 0), (-3, 0), (-3, 0), (-3, 0), (-3, 0), (-3, 0), (-3, 0), (-3, 0),
   (-3, 0), (-3, 0), (-3, 0), (-3, 0), (-3, 0), (-3, 0), (-3, 0), (-2, 0),
   (-3, 0), (-3, 0), (-3, 0), (-3, 0), (-3, 0), (-3, 0), (-3, 0), (-3, 0),
   (-3, 0), (-3, 0), (-3, 0), (-3, 0), (-3, 0), (-3, 0), (-3, 0), (-3, 0),
   (-3, 0), (-3, 0), (-3, 0), (-3, 0), (-3, 0), (-3, 0), (-3, 0), (-3, 0),
   (-3, 0), (-3, 0), (-3, 0), (-3, 0), (-3, 0), (-3, 0), (-3, 0), (-3, 0),
   (-3, 0), (-3, 0), (-3, 0), (-2, 0), (-3, 0), (-3, 0), (-3, 0), (-3, 0),
   (-3, 0), (-2, 0), (-3, 0), (-3, 0), (-3, 0), (-3, 0), (-3, 0), (-3, 0),
   (-3, 0), (-3, 0), (-3, 0), (-3, 0), (-3, 0), (-3, 0), (-3, 0), (-3, 0),
   (-3, 0), (-3, 0), (-3, 0), (-3, 0), (-3, 0), (-2, 0), (-3, 0), (-3, 0),
   (-3, 0), (-3, 0), (-3, 0), (-3, 0),  (-3, 0), (-3, 0), (-3, 0), (-3, 0),
   (-3, 0), (-3, 0), (-3, 0), (-3, 0), (-3, 0), (-3, 0), (-3, 0), (-3, 0),
   (-3, 0), (-3, 0), (-3, 0), (-3, 0), (-3, 0), (-3, 0), (-3, 0), (-3, 0),
   (-3, 0), (-3, 0), (-3, 0), (-3, 0), (-3, 0), (-3, 0), (-3, 0), (-3, 0),
   (-3, 0), (-3, 0), (-3, 0), (-3, 0), (-3, 0), (-3, 0), (-3, 0), (-3, 0),
   (-3, 0), (-3, 0), (-3, 0), (-3, 0), (-3, 0), (-3, 0), (-3, 0), (-3, 0),
   (-3, 0), (-3, 0), (-3, 0), (-3, 0), (-3, 0), (-3, 0), (-3, 0), (-3, 0),
   (-3, 0), (-3, 0), (-3, 0), (-3, 0), (-3, 0), (-3, 0), (-3, 0), (-3, 0),
   (-3, 0), (-3, 0), (-3, 0), (-3, 0), (-3, 0), (-3, 0));

Define KerningPairs
 ("AV","AW","Av","Aw","F,","F.","FA","LT","LV","LW","P,","P.","PA","T,","T.","TA",
  "Ta","V,","V.","VA","Va","W,","W.","WA","Wa","Wo","Y,","Y.","Ya","Yq","w,","w.",
  "y,","y.","","",".",",","","","","","","","","","","",
  "","","","","","","","","","","","","","","","",
  "","","","","","","","","","","","","");

Define KerningValues
 (  -1,  -1,  -1,  -1,  -2,  -2,  -1,  -1,  -1,  -1,  -2,  -2,  -1,  -1,  -1,  -1,
    -1,  -2,  -2,  -1,  -2,  -2,  -2,  -2,  -2,  -1,  -2,  -2,  -1,  -1,  -1,  -1,
    -2,  -1,  -1,  -1,  -1,  -1,  -1,  -2,  -1,  -1,  -1,  -2,  -2,  -1,  -1,  -2,
    -2,  -1,  -1,  -1,  -1,  -2,  -1,  -2,  -1,  -3,  -1,  -2,  -1,  -1,  -1,  -2,
    -1,  -1,  -1,  -2,  -2,  -1,  -2,  -2,  -2,  -2,  -2,  -2,  -1);

CreateLayer               Main;
LayerSetImage             Main 'DwarvenTodcraft15';
LayerSetAscent            Main 18;
LayerSetCharWidths        Main CharList WidthList;
LayerSetCharWidths        Main (' ') (9);
LayerSetKerningPairs      Main KerningPairs KerningValues;
LayerSetImageMap          Main CharList RectList;
LayerSetCharOffsets       Main CharList OffsetList;
LayerSetAscentPadding     Main 0;
LayerSetLineSpacingOffset Main 0;
LayerSetPointSize         Main 15;

SetDefaultPointSize  15;
